function[] = matriz(a)
a=load ('a.dat');
m=0;p=1;
for j=1:10
    g=sum(a(j,:));b=sum(a(:,j));
    if(g>m || b>m)
       m=max(g,b);p=j;
    end
end
    if(sum(a(p,:))>sum(a(:,p)))
      sprintf('fila %d',p)
    else
      sprintf('col %d',p)
    end  
